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STOP PRESS... STOP PRESS... STOP PRESS... 
Atari _ Clamp Down 

News is just coming through of a clamp down on 
Software distribution which is in any way similar 
to the Atari Puc-Men. This has already effected 
Bug— Byte Software causing us to withdraw our program 
Vicmen. It is already suspected that several other 
Atari programs may have to "be withdrawn by other 
companies who produce their own versions^ otherwise 
Atari could make legal moves. 

B.B.C. P.C.B. Problems 

Problems with the B.B.C, P.C.B. which mean that certain 

expansion capabilities such as the floppy disc es const 

and talking expansion no longer working means that in 

certain cases the whole P.C.B. has to be replaced 

free of charge. Either by your local dealer or" the 

B.B.C. themselves, if any of the letter expansions 

are required. 

More news in the next issue. 
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NOT I CE 

THE MAGAZINE "THE BEEBON" ITS 
ENTIRE CONTENTS AND NAME ARE 
STRICTLY COPYRIGHT OF BUB-BYTE 
(C) 1982. BUG-BYTE HEREBY 
BRANTS TO THE PURCHASER OF THIS 
MAGAZINE A NON-EXCLUSIVE AND 
NON-TRANSFERABLE LICENCE TO 
COPY AND USE ALL INFORMATION 
AND PROGRAMS CONTAINED WITHIN 
FOR PERSONAL USE ONLY. ALL 
COMMERCIAL RIGHTS ARE RESERVED. 

The BEEBON is published bi- 
monthly on the third week of 
the month. All correspondence 
should be addressed to: ~ 
THE EDITOR 
THE BEEBON 
106 THE ALBANY 
OLD HALL STREET 
LIVERPOOL 
MERSEY'S IDE 
L3 9EP 

Any letters which require a 
reply should be accompanied by 
a S.A.E As we are extremly busy 
those enquiries which are 
phrased so as to make them 
simple to answer will solicit 
the fastest response. 

Programs and articles sub- 
mitted for publication should 
preferably be typed or computer 
printout. Clear handwriting is 
also acceptable. All programs 
must be on tape or disk and 
have clear instructions for use 
and as much supporting documen- 
tation as possible. A day-time 
telephone number would be ap- 
preciated to allow for easier 
contact . 



EDITORIAL 

We began the last issue of 
the BEEBON by pointing out how 
much of that first issue was 
influenced by the lack of info- 
rmation supplied to the proud 
owner of a brand new B.B.C 
MICRO, we are now very pleased 
to say that the final versions 
of the much awaited USER GUIDE 
are being sent out to those who 
were originaly sent the provi- 
sional user guide. We are ho- 
ping that the dispatch of these 
new manuals will be sent in the 
same order in which the micro- 
computers were sent out, so as 
to make the procedure as fair 
and effective as possible. If 
this is followed.it will hope- 
fully mean that those owners 
who first recieved their micros 
back in FEBUARY, and have thus 
been patiently waiting the lon- 
gest, will be rewarded first. 
We are ensured that every B.B.C 
MICRO which is dispatched after 
July will contain the new user 
guide, and all owners with the 
old guide should have been sent 
their new copies within three 
months, but with the record so 
far upheld by the B.B.C and 
ACORN, who knows. 

More much awaited news is 
that the BASIC and M.O.S ROMS 
appear to have reached the final 
version. New B.B.C owners may 
find that when they type: - 

*FXO 
that their micro announces that 
they have ROM based BASIC 
VERSION l.if so, you are one of 
the lucky owners who will not. 
have a long and tortuous wait 



to recieve their new ROMS as 
all those who already have 
their micros wi 1 1 . Look out for 
Further details o-f the new ROM 
set in this and later issues o-f 
the BEEBON. 

The number of B.Ei.C micros 
being despatched has rapidly 
improved since the last issue 
of the BEEBON. The situation 
with model A micros is very 
good with the word from ACORN 
that 10,000 have been despat- 
ched and that there should now 
be no more than a three week 
delay and upon recievinq 
orders, I am afraid that the 
news for those awaiting model Ei 
micros has not changed and may 
have even got worse. About 8000 
have been despatched by the 
time you read this, but as many 
as 11,000 may still be on or- 
der, so your patience will have 
to hold for quite a while yet. 

On to better news, the 
amount of software available 
for the B.B.C micro appears to 
be on the increase with all the 
monthly and weekly magazines 
giving listings for it.A lot 
more companies seem to be ente- 
ring the B.B.C software scene 
but the quality of all these I 
am not able to comment on as I 
have not personally seen a lot 
of them. I am afraid that in 
certain cases the writers have 
taken advantage of the fact 
that many new owners are very 
keen to get hold of software 
and send away for the first 
that they see, only to be sent 
a very poor quality game which 
does not reach the standard 
described in the original ad- 
vert. <We at BUG-BVTE hope that 
we can not be accused of such 
schemes and would gratefully 
recieve any critical or 
constructive comments on our 
B.B.C software) so. since the 
last issue of the E1EEB0N, 
circumstances have improved 
slightly, but I am sure we all 



await the resoltion of some of 
the problems described in this 
and the previous editorial. 
To close 1 hope you enjoy the 
contents of this issue of the 
BEEBON, and to those still 
awaiting their machines. I can 
only say have patience, you &rs 
awaitinq a superb machine. 



YOUR 



"ERS 



Each month will print a 
selection of letters which we 
consider of interest to owners 
of B.B.C micros. Some will be 
critical, others will be con- 
structive, we will try and be 
as unbiased as possible. Wri- 
ters of all printed letters 
will receive a BUG-BYTE tee- 
shirt. 

Dfsar Sirs, 

Many thanks for "The 
BEEBON". It. is excellent - well 
done. One suggestion: Please do 
a renumber 10,10 on all lis- 
tings before printing them (Eg 
BLITZ wasn't). Then we can all 
use AUTO and not have to type 
in line numbers and also missed 
lines ^re very easy to spot. The 
programmed examples you gave 
(including BLITZ ) were excel- 
lent. Two minor quibbles: Warn 
users that you must. issup a 
MODE command for the *TV "v5, 1 
command, as published by you, 
didn't work ( I found thee fix 
by accident) ie» enter *TV 
command and then reissue appro- 
priate MODE command. Also why 
print "£1" on the front of the 
cover and then tel 1 readers 
that the magazine is ONLY avai- 
lable at a subscription rate of 
£7.50 for 6 issues. 

Anyway, keep up the good 
wor k ! 

Ian D . Sm i t h 
East leigh, HANTS 
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EDs ("hanks for the suggestions 
all listings should be 
renumbered -from now on, the 
magazine has a £1 on the -front 
cover because the magazine is 
available through certain B.B.C 
dealers. 

Dear Sirs, 

re: The BEEBON Hay 82 Page 
7. The program SET IT UP. 
This returns a fault on my 
model A of "Bad HEX at line 
30" . 

Is this a fault in the 
program or do I have trouble in 
the computer? I've checked and 
double checked (with other 
help) to ensure I have entered 
the program correctly. 

Yours faithfully, 

L. Townend 

ED; Put a dollar zero D INSTEAD 
OF *0D IN THE DATA STATMENT. 

Dear Sir, 

I have just recieved the 
first issue of "The BEEBON" and 
have thoroughly enjoyed running 
the "Blitz" game on my micro. 

However I wonder if there 
is any way that I can improve 
the bomb dropping procedure, as 
pressing the space bar doesn't 
always cause a bomb to drop 
even long after the previous 
bomb has landed. It seems that 
the computer does'nt 'see' that 
a key has been pressed. 
Yours faithfully 
S.ANDREWS 
HUNTINGDON, CAMBS 

ED: The best way is to change 
the time delay of the INKEY 
routine in line 210 

We recieved the following 
letter from a rightly irrate 
customer of the BBC and ACORN, 
the letter requested that the 
complaint was made public, so 
here it is to allow you to air 
your views on this particular 



customers problems. 

Dear Sirs, 

My model B BBC Microcompu- 
ter is serial £11435, order 
number N05 ANAAA. 

J§ ; o.y. a .cy. ^feh s 

ordered and paid for in 
full; no acknowledgement 

Msrch-June: 

four despatch dates pro- 
mi sed and broken 

July 1st s 

arrived with no apparent 
post/packing damage, 

: first fault- motor con- 
trol not working properly .... 
would not CHAIN "WELCOME" CON- 
SISTENTLY; *M0TQR 1/*M.1(ETC3 
did work. 

:2nd fault -SAVED but would 
not reload my own programmes. 
Others OK. Heads cleaned. 

= 3rd fault- screen flic- 
ker/ blanked out; I assumed 
faulty coa>; connection. Key- 
board disabled. Retrieved by 
BREAK. Program lost despite 
typing OLD etc. 

July 2nd: 

first and second faults 
intermittent; unreliable! third 
■fault - longer losses of pic- 
ture after coa>: replaced etc. 
Flicker worsening; loss of pic- 
ture after c30 sees then "Bell" 
(CTRL B> sounded consistently. 
Still retrievable by BREAK. 

JULY 3rd: 

Flicker, lines on screen. 
Intermittent losses of 'pic- 
ture' /keyboard functions. CAPS 
LOCK permanently lit during 
this phenomenon. Finally- com- 
plete loss (for good ) of 
screen and keyboard. Loss of 
logo/two tone on switching on. 
Computer effectivly dead. 

Now I am appalled that ACORN 
and the BBC should associate 
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themselves 
shambl es. - - - 
impossibi lit 
at Ketter i 
f au Its. Un 1 e 
to me wi thi n 
a satisfact 
hine and PR 
REPLACEMENT 
to fflvsel f th 
treatment I 
you reply b 



with such 
.the long wait /the 
y <of phoning etc. > 
ng and now the 
ss you can get back 

a reasonable time 
orily working mac- 
IORTISE THE REPAIR/ 
I shal 1 not keep 
e wholly inadequate 
have had- I await 

return ! 



B,B„C MULTIFILE 
■This very comprehensive 
and flexible filing system ap- 
pears to be thee first, piece of 
software for the BBC whi ch i s 
at al 1 di rected towards the 
bussi ness man, but even the 
home user will f i nd i t useful 1 
■for keeping his personal 
records in order- Once again 
look out for more details in 
our advert. 



COPIES OF THIS LETTER WENT TC 
ALL THE FOLLOWING s 

Micheal Harrison, BBC Dire- 
ctor general ' s Dept/Acorn Com- 
puters 

BL Marketing ~ BBC Micro- 
computers, Kettering/BBC 
Computer 1 i teracy Project 

BEEBON MAGAZINE 

London /BEEBUG USER GROUP 

BUG-BYTE 
SOFTWARE InIETWS 

The amount of software now 
avai lable from us for the BBC 
M ICRO i s on the i ncrease „ these 
i nc 1 ude the f ol 1 owi ng : 

SPACE PIRATES 

SPACE P I RATES i s a ver y 
good quality hi -res arcade type 
game that wi 1 1 keep many ardent 
game players awake wel I i nto 
the e^.r 1 y hours of the morm ng - 
More details in our adverts in 
thi s magas ine. 



B.B-.C CHESS 

BBC CHESS for the model 
after 1 ong and unf avour a 
delays is finally available, 
appears it was well worth w 
ting for, it makes full use 
the BBC'S capabilities and t 
pi ays a vtsry good game aqai 
even the best of players, 
has even been known to beat 
author = Look out f or thi s 
i n our advert as wel 1 . 
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Look out 
from us the n&& 
bly i ncl uding 
voice music syn 
musi c from 
it has never b 
wi thout the use 
hardware „ Al so 
could be a fu 
f 1 y i nq praqr&m 
wrote 747 for 
Thi s i ncredibl 
i nto account 1 a< 
an d thus c ou 1 
teaching purpo 
being good fun 
down and pi ay - 
HERE WE COME. 
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B.B.C MICRO TIP 

Heres a smal 1 t i p to 
improve your programs* In some 
programs the cursor i s 1 eft 
flashing around the screen the 
following command will turn it 
of f : 

VBU 23 ; 8202 ; G ; s 



IHE ANALOGUE INTERFACE 

This article is about the A/D converter installed on the 
model B. The A/D (analogue to digital) converter allows the user 
to feed a small voltage, -from a laboratory experiment or a joy- 
stick for games. etc.. into the Beeb and then be able to find a 
numeric or digital equivalent which can be accessed in a program. 
This can be used to gather information about the outside world, 
which rarely uses the nice discrete on/off information so loved 
by computers. 

The actual hardware of the converter requires a voltage in 
the range to 1.8 volts. This is then converted by the chip into 
a number in the range to 4095, hence if a voltage of 1.8 yolts 
is fed in the chip generates the value 4095, volts fed in 
produces the value 0. A voltage halfway between and 1.8 will 
generate a number halfway between and 4095 and so on. There Are 
four seperate analogue input lines on the Beeb, this allows for the 
simul tanious input of four analogue signals. 



To make things easier for those p 
connect up a simple joy-stick or paddle 
there is a reference voltage available 
back of the Beeb. This voltage is the vol 
will convert to the number 4095. There is 
connection, this is the voltage that th 
to the number 0. A simple way of generat 
is to just connect a potentiometer acros 
feed the resulting voltage into one of 
connections. This is shown in the diagram 
have not been calculated by any esoteri 
tested and found to work. 
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Circuit Diagram For Single Joy-Stick And Fire-Button 



There aire some -f aul ts/i mperf ect i ons in the A/D section which 
is not surprising. The largest fault is the choice of device used 
to generate the reference voltage. The converter used is very 
accurate, 1 part in 4096, however the reference voltage is not. 
It is provided bv 3 diodes, see above circuit, which will cause 
the reference to wander with varying temperatures and currents 
drawn, possibly by as much as 1 part in 10. This does not matter 
when the reference voltage is used directly, but., any devices 
which generate their own voltages may appear to vary the voltage 
with time, in fact the voltage may be fixed just the reference 
changes. This makes things difficult. Another possible criticism 
is the speed of the converter, it can only manage 1O0 or so 
conversions a second, again fine for games but the serious user 
may require more speed. 

Values aire read in a Basic program by means of the ADVAL 
function. This function takes a single parameter in the range -9 
to 4. The negative values are used to access information about 
the lengths of different queues, such as the sound queues, and 
have nothing to do with A/D conversion. The values 1 to 4 cause 
the function to return a value corresponding to the voltage on 
each of the 4 channels. This value will be an integer in the 
range to 65520, which is the value produced by the converter 
multiplied by 4. The reason for this is apparently so that some 
time in the dim and very, very distant future a better A/D 
converter with a more accurate range can be used! ADVAL (0) 
returns a number determined by whether either or both of the 
digital input lines sre at 0V (see diag) and also by which A/D 
channel was last scanned. 

The connector used on the back of the Beeb is called a 
female DB15, so to connect anything to the A/D converter fits not 
recomended to just poke wires into the holes!) you should get 
hold of a male DB15 connector. A good joy-stick with 2 channels 
on it is available from Mapl in , Technomat i c or Tandy, I have used 
2 of these and I get reasonable results with the above circuit. 
One button is mounted with each of the joy- sticks to act as a 
' f i re J button. 

The only real problem I have found in using the paddles is a 
random oscillation in the value produced by ADVAL for each 
channel, this is probably caused by the length of the wires used 
to connect the joy-sticks up (about 2 metres). This causes a 
slight "jitter' in any graphics etc. controlled directly by the 
stick. To overcome this problem I am working on several different 
input routines which employ a form of hysterisis and averaqeing 
to obtain a "clean 7 signal. 

The connector at the back is also used for light pens and we 
have heard that some people have been successful! in attatching a 
commercial light pens to the Beeb. The light pen used was 
manufactured by the Welsh company Arfon. 



6 EQNI £MIQ8 FOR JHE BEEB 

This program is a relatively simple font editor for the 
Beeb. Unfortunately it will not -fit on a model A because it makes 
extensi ve use of fairly I arqe arrays and the mode 4 screen . It i s 
quite simple to use, with a bit of practice characters can be 
def i ned very rapi dl y and 1 ncorporated i nto programs. The 
characters used in the Thargoids game in thi s i ssue were defined 
and incorporated into the program in about 5 minutes from start 
to finish ! The main advantage of this font editor is the ahi 1 ity 
to create an EXEC file which will load the VDU 23 commands 
required to define the characters into any Basic program. so no 
more laborious work with pencil paper sind hexadecimal arithmetic, 

When you have? typed i n the program, i ts not real I y as 1 onq 
as it looks (honest.) , simply run it. When the two grids appear 
after the brief blurb at the beqininq you can start to create 
your characters. First of ail you have to edit the character- 
layout grid. Press * C a 'square' cursor will then appear in the 
bottom corner of the smal l&r grid. The position of this cursor i s 
controlled by the normal editing cursor control keys. When the 
cursor is positioned at a point corresponding to a character 
position which you would like to define press the <COPY> key. The 
cursor wi 1 1 di ssapear and you wi 1 1 be prompted for a character 
number B Thi s number can be in the range 224 to 255, a restri cti on 
imposed because of differences between the old and new OS roms. 
The character number wi 1 1 then appear i n the posi ti on where the 
cursor was last seen. At this point the cursor will reapear „ To 
e>ci t this edi ti nq mode press < RETURN > at any t i me whi 1 st the 
square cursor i s on the screen- In thi s wav a pattern of 
characters can he built up corresponding to shapes composed of 
several user def ined graph i cs. 

The ne>; t stage is to actually define the characters 
themselves. Press 'B' to get into the correct editing mode. You 
will then be prompted for a character to edit, the number of this 
character must be present on the smal 1 character grid. A large 
cross will then appear after several seconds in the bottom corner 
of the large grid. As before the cursor control keys will move 
the cross about the grid. Pressing the <COPY> key will cause 
blank squares to become white and vice-versa. Again to exit just 
press <RETURN> whilst, the-? cross cursor is visible. If you attempt 
to edi t a character a second t. :i me the edi tor will remember the 
state of the character -s.nd restore the 'bit 7 grid to that state- 

The final stage is to create the EXEC file, to do this press 
* E T . You wi 1 1 then be prompted for a 1 i ne number , thi s shoul d be 
the line number you want the VDU 23 commands to define the 
character s to star t at . The f i 1 e wi 1 1 contai n a ser i es of 1 i nes 
start, i nq at the speci f i ed 1 i ne number and i ncrement ing i n tens. 
The f i I e wi. I 1 contai n a separate 1 i ne for each character present 
in t.he character- gr i d. Mul ti pie occurences wi II be i gnored. You 
wi I 1. be prompted wi th the usual message when a program i s bei nq 
s a v ed .: W h e n t h e e d i 1 1 n q a r ids r e a p p e a r y ou c a n s t op t h e t ape. 

To use the file vou have created rewind the tape and load in 
the program the characters were designed for. Then tvpes 

&EXEC"" <RETURN> 

f'his will cause the lines <.:rt?^lvd bv the rortt editor ho he 
entered as though vou typed them lit yourself. 



30 


REM 


* 


40 


REM 


* 


50 


REM 


* 


60 


REM 


* 


70 


REM 


* 



lO MODE 4 

20 REM **************************** 

FONT EDITOR !!!!!!!!! * 

Ver 2.0 by J. CI egg * 

* 

80 REM **t**************t*********t 

90 DIM BT (8, S> , CH <4, 4) , CH_DATA7. < 16., 8>_5 UX=0: U¥=0: CX=0: CY=0: CHAR=0 
100 PROCINITIALISE 
110 CLS : PRINT : PRINT : PRINT 
120 PRINT TAB(7);"F ONT EDITOR" 
130 PRINT TAB <6> ; '■-=====================-» 

140 PRINT : PRINT " This program allows the user to" 

150 PRINT "de-fine the bit patterns which make up" 

160 PRINT "the characters printed on the screen" 

170 PRINT : PRINT " Up to 16 characters can be displayed" 

ISO PRINT "on the screen simul tani ousl y so that" 

190 PRINT "pictures which are composed o-f several" 

200 PRINT "characters, e.g. Space Invaders, can" 

210 PRINT "easily be designed." 

220 PRINT :PRINT " It is possible to save the data" 

230 PRINT "onto tape or to create an "EXEC" file" 

240 PRINT "to incorporate the characters into a" 

250 PRINT "BASIC program" 

260 PRINT :PRINT" (Press any key to continue) "; SET* 

270 CLS=PR0C_SET_UP_EDIT 

280 PROC^MENU 

290 END 

3O0 DEF PR0C_ INITIALISE 

310 LOCAL X,Y 

320 FOR X=1TQ8:F0R Y=1T08 

330 BT(X,V)=0 

340 NEXT Y:NEXT X 

350 FOR X=1T04:F0R Y=1T04 

360 CH(X,Y)=0 

370 NEXT YsNEXT X 

380 FOR X=lT016sCH_DATA%<X,0)=0:F0R Y=l TO 8 

390 CH_ D AT AX ( X , Y ) =0 

400 NEXT Y:NEXT X 

410 ENDPROC 

420 DEF PROC_SETJJP_EDIT 

430 CLS 

440 PROC.DRAW BIT_GRID 

450 PROC_DRAW_CHAR_BRID 

460 ENDPROC 

470 DEF PROC__DRAW_BIT_GRID 

480 LOCAL X.Y 

490 FOR X=10TO61OSTEP75 

500 MOVEX , lOOO: DRAWX , 400 

510 NEXTX 

520 FOR Y=1000T0390STEP-75 

530 M0VE10,Y:DRAW 610,Y 

540 NEXT Y 

550 ENDPROC 



10 
560 DEF PROC_SET_BIT(X,Y) 

57C LOCAL LX.LY 

580 LX=X*75+lB:LY=Y*75+408 

590 MOVE LX,LY:MOVE LX+60.LY 

600 PLOT 85,LX+60,LY+59:M0VE LX.LY+59 

610 PLOT B5,LX,LY 

620 BT(X,Y>=1 

630 ENDPROC 

640 DEF PROC_RESET_BIT(X,Y> 

650 LOCAL LX,LY 

660 LX=X*75+18:LY=Y*75+408 

670 MOVE LX,LY:MOVE LX+60,LY 

680 PLOT 87,LX+60,LY+59!MOVE LX.LY+59 

69C> PLOT 87,LX,LY 

700 ET(X,Y)=0 

710 ENDPROC 

720 DEF PROC_CURSOR(X,Y> 

730 LOCAL LX,LY 

740 LX=X*75+18:LY=Y*75+40B 

750 MOVE LX.LY: PLOT 6,LX+60,LY+59 

760 MOVE LX+60,LY:PLOT 6, LX.LY+59 

770 ENDPROC 

780 DEF PROC ED I TB ITS 

790 LOCAL A 

BOO CX=0:CY=0 

810 *FX 4, 1 

B20 PROC CURSOR <CX,CY) 

B30 REPEAT : A=GET 

840 PROC ..CURSOR (CX , CY ) 

B50 IF A=136 THEN CX=CX-1 

860 IF A=137 THEN CX=CX+i 

870 IF A=138 THEN CY=CY-1 

880 IF A=139 THEN CY=CY+1 

890 IF A<>135 THEN 910 

900 IFBT(CX,CY)=1 THEN PROC^RESET_BIT (CX, CY) ELSE PRQC_SET_EIT (CX , CY) 

910 CX=(CX+8)MOD8:CY=(CY+B)M0D8 

920 PROC. _CURSOR ( CX , CY ) 

930 UNTIL A=&OD 

940 *FX 4,0 

950 PROC. CURSOR (CX,CY) 

960 ENDPROC 

970 DEF PROC _DRAW .CHAR SRID 

980 LOCAL X.Y 

990 FOR X=8OOTO12OOSTEP10O 
1 OOO MOVEX , 1 OOO : DRAWX , BOO 
1010 NEXT 

1020 FOR Y=lOOOTOBO0STEP-5O 
1O30 MOVEBOQ,Y:DRAW 1200, Y 
1040 NEXT 
1050 ENDPROC 
1060 DEF PROC EDI TCHARS 
1070 LOCAL A 
1080 UX=0:UY=O 
1O90 *FX 4,1 

UOO PROC CHAR CURSOR (UX,UY) 
1110 REPEAT :A=BET 
1 1 20 PROC CHARCURSOR (UX , UY) 
1130 IF A=136 THEN UX=UX- 1 
1140 IF A=137 THEN UX=UX+1 
1150 IF A-138 THEN UY=UY-1 



11 /O IF A0 135 THEN 1190 

1180 PROC_GET_CHAR(UX,UY) 

1190 UX=(UX+4)MOD 4: UY= CUY+48) MOD 4 

1 200 PROC CHAR CURSOR ( UX , U Y > 

1210 UNTIL A=S,OD 

1220 *FX 4,0 

1 230 PROC_CHAR_ CURSOR ( UX , UY ) 

1240 ENDPROC 

1250 DEF PROC _CHAR ^CURSOR <X,Y> 

1260 LOCAL LX.LY 

1270 LX=X*100+810:LY=Y*50+805 

1280 MOVE LX,LY:PLOT 6,LX+80,LY 

1290 PLOT 6,LX+BO,LY+40:PLOT 6,LX«LY+40 

1300 PLOT 6,LX,LY 

1310 ENDPROC 

1320 DEF PR0C_6ET^CHAR(X,Y) 

1330 LOCAL LX.LY, CH 

1340 LX=X*100+810:LY=Y*50+837 

1350 MOVE LX.LY 

1360 M0VELX+85,LY:PL0T87,LX+85,LY-3O 

1370 MOVELX,LY-3O:PL0T87,LX,LY 

1380 PRINT TAB (20, 10) i "CHARACTER CODE"; 

1390 INPUT CH 

140O IF (CH>255 OR CH<224) AND CHOO THEN 13SO 

1410 IF CH=Ci THEN1430 

1420 VDU 5: PRINT; CHj :VDU 4 

1430 PRINTTAB<20, 10); " ": 

1440 FRINTTAB(34, 10) ; " "; 

1450 IF CH(X,Y>=CH THEN 1490 

1460 PROC_DELETE_OLD(CH<X,Y>) 

1470 PROC_ ALLOCATE (CH) 

1480 CH<X,Y)=CH 

1490 ENDPROC 

1500 DEF PROC DELETE _OLD (CHAR) 

1510 LOCAL X,Y,DELT 

1520 DELT=-1 

1530 FOR X=lTO4:F0RY=lTO4 

1540 IF CHAR=CH(X,Y) AND NOT(X=UX+l AND Y=UY+i) THEN DELT 

1550 NEXT: NEXT 

1560 IF NOT DELT THEN ENDPROC 

1570 X=0: REPEAT: X=X+1 

1580 UNTIL CH DATAX (X, 0> =CHAR 

1590 CH DATAX (X,0)=0 

1600 ENDPROC 

1610 DEF PROC^ ALLOCATE (CHAR) 

1620 LOCAL X, ALLOC 

1630 ALL0C=-1 

1640 FDR X=1T016 

1650 IF CH. DATAX(X,0>=CHAR THEN ALLOC=0 

1660 NEXT X 

1670 IF NOT ALLOC THEN ENDPROC 

1680 X=0:REPEAT;X=X+1 

1690 IF CH_DATAX(X„0)=OTHEN CH DATAX ( X , O) =CHAR 

1700 UNT I L CH DATAX < X , O > =CHAR 

1710 ENDPROC 

1720 DEF PROC DRAW CHARS 

1730 LOCAL X,Y 

1740 FOR Y=3TOOSTEP-l 

1750 PRINTTAB(26, 16 -Y) : 

1760 FOR X=0TO3 

1770 IFCH(X,Y) =U THEN PRINT" ";;SOTO 1 790 



12 
1780 PRINT ;CHR*(CH(X,Y) ) ; 
1790 NEXT: NEXT 
1800 ENDPROC 
1810 DEF PROC .MENU 
1 820 PR I NTTAB ( 4 , 25 ) : " SELECT - " ; 
1830 PRINT"Edit Chars (C> , Edi t Bits(B)" 
1840 PRINTTABU1.26) ; "Quit(Q), "j 
1850 PRINT"Create Esec(E) " 
1860 S*=BET* 

1870 IF S*="C" THEN PROC EDITCHARS 
1880 IF S*="B" THEN PROC_EDIT_START 
1890 IF S*="Q" THEN PROC__QUIT 
1900 IF S*="E" THEN PROC_EXEC 
1910 6OT0 1820 

1920 DEF PROC ^CONVERT .BYTE (ROW, BYTE) 
1930 LOCAL X 
1940 X=7 
1950 REPEAT 

1960 IF BYTE/2-INT (BYTE/2) >0.25THEN BT(X,R0W)=1 ELSE BT(X,ROW>=0 
1970 BYTE=INT (BYTE/2) 
19SO X=X-1 
1990 UNTIL X<0 
2000 ENDPROC 

2010 DEF FN_ CONVERT ROW (ROW) 
2020 LOCAL BYTE 
2030 BYTE=0 
2040 FOR X=0T07 

2050 BYTE=BYTE*2 + BT(X.ROW) 
2O60 NEXT 
2070 =BYTE 

2080 DEF PROCEED I T_START 
2090 LOCAL X,Y,CH,NM 
21O0 NM=Q 

2110 PRINTTAB(1,22) ; 
2120 INPUT "WHICH CHARACTER " , CH 
2130 IFCH=0THEN2360 
2140 FOR X=1T016 

2150 IF CH DATAX(X,0)=CH THEN NH=X 
2160 NEXT: IF NM = O THEN 2110 
2170 FOR Y=0T07 

2180 FROC_ CONVERT.BYTE ( Y, CH_DATA7. (NM, Y+l > ) 
2190 FOR X=0TO7 

2200 IF BT(X,V')=1THEN PROC _SET_BIT ( X, Y) ELSE PROC_RESET _BIT ( X, Y) 
2210 NEXT 
2220 NEXT 
2230 PROCEDITBITS 

2240 MOVE 650, lOOG: MOVE 750,1000 
2250 PLOT 87, 750, 400: MOVE 650,400 
2260 PLOT 87,650,1000 
2270 VDU 23, CH 
2280 FOR Y=7TOO STEP-1 

2290 CH DATA'/. (NM, Y+l ) =FN C0NVERT__ROW ( Y) 
2300 VDU CH DATA%<NW, Y+l) 
2310 NEXT 
2320 FOR Y=0 TO 7 
2330 MOVE 650,975-(7-Y)*75 
2340 VDU 5:PRINT;CH BATA7. (NM, Y+l ) : VDU4 
2350 NEXT 
2360 PRINTTAB(1,22> ;" 
2370 PROC _ DRAW CHARS 
2380 ENDPROC 



2390 DEF PR0C_EXEC 

2400 LOCAL X.Y.NUM 

24 lO CLS 

2420 PRINTTAB(12,26>; 

2430 PRINT"Start line number"; 

2440 INPUT NUM 

2450 PRINTTAB<12,25> ; 

2460 *SP00L" CHARACTER" 

2470 FOR X=1T016 

2480 IF CH DATA7.(X,0)=0 THEN 2530 

2490 PR I NT : NUM ; " VDU 23 , " ; CH_ DATA7. < X , ) ; 

25O0 FOR Y=8T01STEP-1 

2510 PRINT; " , ";CH DATA7.<X,Y> ; 

2520 NEXT: PRINT: NUM=NUM+ 10 

2530 NEXT 

2540 *SPOOL 

2550 PROC, RESTORE^ SCRN 

2560 ENDPROC 

2570 DEF PROC^QUIT 

2580 CLS 

2590 PRINTTAB<12,25>;"Are you sure <Y/N>"; 

2600 INPUT Q* 

2610 IF S*="Y"THEN END 

2620 ENDPROC 

2630 DEF PROC_ RESTORE SCRN 

2640 CLS 

2650 PROC^SET_UP EDIT 

2660 PROC^. RESTORE^ CHARS 

2670 ENDPROC 

2680 DEF PROC RESTORE_ CHARS 

2690 LOCAL X,Y 

2700 FOR Y=OT04:FOR X=0T04 

2710 MOVE X*lO0+81O, Y*50+837 

2720 IF CH<X,YX>0 THEN FRINTCHR* (5) ; CH < X , Y) ; CHR* (4) ; 

2730 NEXT :NEXT 

2740 ENDPROC 



BSE MICRO TIPS 

Try this small envelope command and sound, . if any one 
experiments with send it in as a entry for the best sound effect 
or envelope: 

ENVELOPE 1, 1,-26. -36, -45, 255, 255, 255, 127,0,0,0, 126,0 
SOUND 1.1,1,1 
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THARGOIDS 

b y 

Thargoids is a short program for both the model A and model 
B Beebs. Though it mav be necessary to leave out some of the text 
to fit it onto the model A. It will work in modes 0,1,2,4 and 6, 
though mode 6 is the only mode that will work on an 'A' and 4 is 
the recommended mode for the 'B'. This is changed by modifying 
line 20. 

The game itself is based loosely on the old computer game 
'Zombies', which may be familiar to many people. A rectangular 
area is scattered with objects deadly to both the computers 
'Thargoids' and the player's character, these are the pools of 
explosive 'Gloop'. The computer guides the Thargoids towards the 
players character and the player tries to lure the Thargoids 
into contact with the 'pools* which destroys them. When all the 
Thargoids have been destroyed another screen is put up with a new 
set of Thargoids, the number of Thargoids is increased by one 
each set, up to a limit of twice the original number. The player 
character is 'killed' by contact with a Thargoid or a Gloop pool. 

The game can be made easier or harder by varying the the 
number of Gloop pools, line 40 (GLOOP), and the initial number of 
Thargoids, line 30 (THARGS). More pools will destroy the 
Thargoids faster, so the player will not have to cope with close 
contact. with many Thargoids. More Thargoids will obviously make 
the game harder. More than 12 Thargoids are extremely hard to 
cope with. 

The characters were defined using the font editor, see else 
where in this issue, for those people who want to use the 
characters separately, the man is formed by characters 224 and 
225 (lines. 90-100). the Thargoid is formed by characters 226 and 
227 (lines 110-120) and the hole/pool is formed by the four 
characters 228 to 231 (lines 130-160). 

The envelope defined in line 10 was found bv some careful 
experimentation. Using SOUND 0,1,80,1 a sound like a shell 
exploding is produced, several quick sounds together produce a 
fairly realistic salvo effect. 



BBC MICRO HINTS 

Many people have questioned the hole in the left hand side 
of the keyboard casing, all that would be said is that it could 
be used for plug in game cartridges in the near future by the 
BBC. Borne people will notice that under this slot there is 
allowance for' the plugging in of at least on ROM. What do they 
have in line for us now? 
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10 ENVELOPE 1 , 178, -50,-75, -1O0, 2, 2, 2, 127, -20, -20,-20, 126, 50 

20 MODE 6:CLS:PRINTTAB<12,14>:"T H A R G I D S" 

30 WT=30:HT=10:THARGS=8:DIM LA<WT, HT) , TH (THARGS*2, 3) ,DM<7,2) ,MO(3,3) 

40 MX=0:MY=0: SLOOP= 1 5 : DEAD=F ALSE : K I LLED=0 

50 LIMIT=2*THARGS 

60 FOR X=0T07:READ DM< X, 1 ) , DM<X , 2) : NEXT 

70 F0RY=1T03:F0RX=1T03:READ MO (X , Y) : NEXT: NEXT 

80 FOR X =lTO WT:FOR Y=1T0 HT: LA (X, Y> =0: NEXTiNEXT 

90 VDU 23,224,60,36,60,24,126,189,189,189 
10O VDU 23,225,90,60,60,36,36,36,36,102 
110 VDU 23,226,195,36,60,90,90,255,231,165 
120 VDU 23,227,165,255,189,165,36,36,102,0 
130 VDU 23,228,0,7,24,32,32,64,64,64 
140 VDU 23,230,64,64,64,32,32,24,7,0 
150 VDU 23,231,2,2,2,4,4,24,224,0 
160 VDU 23,229,0,224,24,4,4,2,2,2 
170 PRINTINKEY*<500):CLS:PRINTTAB!0,7> 
ISO PRINT" You are stranded in a pen on the" 
190 PRINT"planet Beetlejuice IV, The local" 
200 PRINT"wildl ife, the Thargoids, are hungry" 
210 PRINT"and have decided that you would" 
220 PRINT"make a nice change for lunch. ": PRINT 
230 PRINT" Your only chance is to lead the" 
240 PRINT"stupid an clumsy Thargoids into" 
250 PRINT"the pools of explosive Gloop which" 
260 PRINT"cover the area. ":PRINT INKEY* (2000) : CLS 
270 PRINTTAB(0,7> ; "To move use the keys as shown below" 
2B0 PRINTTABU0, 10>:"I P" ; TAB ( 10, 12) : 
290 PRINT"K L +" ; TAB ( 10, 14) ; '■< > ?" 
300 PRINTTAB<0, 16) ; " 'L* means do not move, the rest" 
310 PRINT"move you relative to your current"," position." 
320 PRINTINKEY*<5O0>= PRINT" GOOD LUCK!" 
330 INPUT"Press <RETURN> to continue"K* 

340 CLS:PRINTTAB<0,3> s "+": 

350 DEAD=FALSE 

360 FOR X=lTOWT: PRINT"-";: NEXT: PRINT"+" 

370 FOR Y=1T0<2»HT): PRINT" !": TAB (WT+1 > :"!": NEXT: PRINT"+" : 

380 FOR X=1T0WT:PRINT"-";:NEXT:PRINT"+": 

390 PRINTTABU.l); "HERE ARE THE GLOOP POOLS": 

400 FOR C=1T0GL00P 

410 X=RND<WT-i> : Y=RND<HT> 

420 IF LA<X,Y)<>0 OR LA(X+1,Y><>0 THEN 410 

430 LA(X,Y)=3:LACX+1,Y)=3 

440 PROC_DRAW_.HOLE ( X , Y ) 

450 ' NEXT C 

460 MX=X:MY=Y 

470 PRINTTAB<1,1):"HERE ARE THE THARGOIDS ": 

480 FOR C=lTOTHARGS 

490 X=RND(WT) :Y=RND(HT) 

500 IF LA(X,Y)<>0 THEN 490 

510 TH(C, 1)=X:TH(C,2)=Y:TH(C,3>=RND(8) 

520 LA(X,Y)=2 

530 PR0C_DRAW^THING(2,X,Y) 

540 NEXT 

550 PRINTTABd, 1) ; "AND HERE YOU ARE !!! ": 

560 X =RND ( WT ) : Y=RND ( HT ) 

"=!-7f> IF I A ( X . V 1< >r> THFll ^A(l 
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580 LA<X, Y>=1:MX=X:MY=Y 

590 PROC_DRAW_THING(l,X,Y> 

600 PRINTTAB < 1 , 1 ) ; ■■ 

610 ZAPPED=0 

620 REPEAT 

630 PRINTTAB(1,1);KILLED;" 

640 PROC MOVE^MAN 

650 C=0 

660 REPEAT 

67C> C=C+1 

6SO PR0C_M0VE_THARG0ID<C) 

690 UNTIL DEAD OR C=THARBS 

700 UNTIL DEAD OR ZAPPED=THARSS 

710 FOR T=1T04000:NEXT 

720 PR I NT I NKE Y * ( 500 ) : CLS 

730 IF ZAPPED=THARGS THEN THARGS=THARGS-NOT (THARGS=LIMIT) : GOTO 890 

740 IF LA(MX,MY>=3 THEN8O0 

750 PRINTTAB CO, 7) ; "Well never mind life was cruel" 

760 PR I NT "anyway. Take consolation in thefact" 

770 PRINT"that the Thargoid that ate you had a" 

780 PRINT"very bad case of indigestion." 

790 GOTOB40 

BOO F'RINTTAB (0, 7) ; "Your remains are smeared across a" 

810 PRINT"major portion of the local landscape" 

820 PRINT"and will be a source of great " 

830 PRINT"olf actory discomfort for many months." 

840 PRINTTAB (10, 15) ; 

850 *FX15,0 

860 INPUT"Another game < Y/N) " . A* 

870 IF A*="N" THEN 930 

880 K I LLED=0 s THARGS=L I M I T / 2 

890 FOR X=1T0WT;F0RY=1T0HT:LA(X, Y) =0: NEXT: NEXT 

900 GOT0340 

910 DATA 0,1,1,1,1,0,1,-1,0,-1,-1,-1,-1,0,-1,1 

920 DATA 5,4,3,6,0,2,7,0,1 

930 END 

940 DEF PR0C DRAW THING (TYPE, X, Y> 

950 LOCAL CH,LX,LY 

960 LX=X:LY=24-2*Y 

970 IF TYPE>2 OR TYPE< 1 THEN ENDPROC 

980 CH=TYPE*2+222 

990 PRINTTAB (LX.LY) ; CHR* (CH> ; TAB (LX , LY+1 > ;CHR*(CH+1>; 
1 OOO PR I NTT AB ( , O > ; 
1010 ENDPROC 

1020 DEF PRQC J10VE„ THARGOID (NM> 
1030 LOCAL TX,TY,TD,DX,DY,DR 
1040 TX=TH<NM, 1) :TY=TH(N«,2) :TD=TH(NM,3) 
1050 IF TX=0 THEN ENDPROC 
1 060 SOUND 1,-9,10,1 

1070 DX=2+S6N(MX-TX) ! DY=2+SGN (MY-TY) 
108O DR=MO(DX,DYi 
1090 LA(TX,TY)=0 
1100 IFDR=TD THEN1140 

UlO IF RND(30X = llTHENTD=TD+(RND(3>-2> :GOT0113O 
1120 IF (DR-TD+8) MODS XTD-DR+8) MODS THEN TD=TD-1ELSE TD=TD+1 
1130 TD=(TD+8)HOD8 

1140 TX=TX+DH(TD, 1) ; TY=T Y+DM (TD.2) 
1150 IF TX>WT THEN TX=TX-1 
1160 IF TX<J THEN TX=TX+1 
1170 IF TY3HT THEN TY=TY-1 
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HBO IF TY<1 THEN TV=T¥+1 

1190 PR0C^UNDRAW_THIN6(TH(NM, 1) ,TH<NM,2> ) 

1200 IF LA<TX,TY> = O THEN 1250 

1210 IF LA(TX,TY> = 2 THEN TX=TH CNM, 1 > : TY=TH <NM, 2> 

1220 IF LA<TX,TY> <> 3 THEN 1240 

1230 ZAPPED=ZAPPED+1:KILLED=KILLED+1: SOUNDO, 1,80, 1 : TX=Os G0T01270 

1240 IF LA(TX.TY) = 1 THEN DEAD=TRUE: SOUNDO, -15, 7, 100 

1250 PRQC_DRAW_THING<2,TX,TY> 

1260 LA<TX,TY>=2 

1270 TH<NM, 1)=TX:TH<NM,2)=TY:THCNM,3)=TD 

1280 ENDPROC 

1290 DEF PROCJJNDRAW_/rHING<X,Y> 

1300 LOCAL LX,LY 

1310 LX=X:LY=24-2*Y 

1320 PRINTTAB(LX,LY); " " ; TAB <LX, LY+1 ) ; " "; 

1330 PRINTTAB<0,0>; 

1340 ENDPROC 

1350 DEF FROC_DRAW_HOLE<X,Y> 

1360 LOCAL LX,LY 

1370 LX=X:LY=24-2*Y 

13SO PRINTTAB(LX.LY); :VDU 228,229 

1390 PRINTTAB(LX,LY+1) ; : VDU 230,231 

1400 ENDPROC 

1410 DEF PROC_MOVE_MAN 

1420 LOCAL CH,DX,DY 

1430 DX=0:DY=0 

1440 *FX15, 1 

1450 CH=INKEY(300> 

1460 IF CH=&49 OR CH=&4F OR CH=?,SO THEN DY=1 

1470 IF CH=!<2C OR CH=&2E OR CH=St2F THEN DY=-1 

1480 IF CH=&50 OR CH=8<3B OR CH=&2F THEN DX = 1 

1490 IF CH=3<49 OR CH=&4B OR CH=St2C THEN DX=-1 

1500 IF MX+DX>WT OR MX+DX<1 THEN DX=0 

1510 IF MY+DY>HT OR MY+DY< 1 THEN DY=0 

1520 PROC_UNDRAW_THINB(MX,MY> 

1530 LA(MX,MY)=0 

1540 S0UND18,-7, 10,20 

1550 MX=MX+DX:MY=MY+DY 

1560 IF LA(MX,MY)=0THEN 1620 

1570 IF LA(MX,MYX>2THEN 1600 

15BO SOUNDO, -9, lO, 100s S0UND1 , -9, lOO, 1O0: SDUND2, -9, 125, 100: SOUNDS, -9, 75, 100 

1590 G0T01610 

1600 SOUNDO, 1,80, 1O0: SOUNDl , -9, 100, 10s SOUND2, -9, 125, 10;S0UND3, -9,75, 10 

1610 DEAD=TRUE: ENDPROC 

1620 PROC DRAW_THIN6(1,MX,MY) 

1630 LA<MX,MY)=1 

1640 ENDPROC 



ZX81 
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B.B.C.MICRO ATOM VIC 
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B.E.C. CHESS £11,50 MBj fll 
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- your mission 



B.E.C. CHESS _ 
B.B.C. MULTIFILE. 
BBC- BACKGAMMON. 
B.B.C. GOLF 



Space Warp is a fantastic space adventure game, far more 
sophisticated than most 'Star-Trek' type games. Makes full 
use of the sound and graphics facilities, and comes with a 16 
page instruction booklet and a function key template. 
Probably the most complex space game yet! Includes high- 
resolution sector and battle displays, full status reports, 
energy allocation displays, and much more. 

£11.50 inclusive 

SPACE PIRATES (16K) 

Space Pirates is a new arcade-style game for the model A or 
model B B.B.C. Micro, using high-resolution graphics and 
sound. Protect your space eggs from the invading pirates. 
Written in machine code for fast action and incredible 
graphic effects. 

£8.00 inclusive 

BBC CHESS (32K) 

Very powerful chess game for the 
B.B.C. Micro. One thousand levels 
of play, plus many options 
including setting up board for chess 
problems, saving game on tape etc. 
Deals with castling and en passant. 
Computer's responses are very fast. 

£11.50 inclusive 

POLARIS (32K) 

You are the captain of a Polaris submarine sailing through 
enemy waters. The enemy are attempting to get a large 
convoy across the sea to support their troops — your mission 
is to sink a vital tonnage to prevents this. 

£8.00 inclusive 
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STARTREK 



MULTIFILE. 
MAZOGS 



- iauu DAMSEL & THE BEAS 

- £5.00 CONSTELLATION 

.£17.50 PROGRAM PACKS 

_ £10.00 1-8 (—" 




VICMEN 


£7 00 


ANOTHER VIC IN THE WALL £7.00 


VICGAMMON 


_ £7.00 


ASTEROIDS 


f7on 



vlTOM 





747 FLIGHT 
SIMULATION 
GALAXIANS _ 
BREAKOUT 



£8.00 
. £9.00 FRUIT MACHINE ." 

PINBALL 

_ £8.00 LABYRINTH 

. £8.00 LUNAR LANDER _ 
. £4.00 GOLF 



£4.00 
£4.50 
£7.00 
£5.50 
£5.00 



ALL PRICES INCLUDE POSTAGE 
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I enclose cheque/P O for 



I OH Please debit my Access 5224 . 
Bcaduycuid 4929 

■ I Name . . 

AtMrfiss 



. Cede . 



100 The Albany, Old Hall Street, Liverpool L3 9EP 



Dealers Discount Available 

I ACCESS, 8APCLAYCAKD OJIDLBS WELCOME ON 241u 
ANSAPHONE 051-227 2642, ax mrt 
I BUG-BYTE SOFTWARE, 
FREEPOST, (No slamp req.) 
■ LIVERPOOL L3 3AB. 
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